Public Class Frm_Main

  Private Sub Frm_Main_Closed(sender As Object, e As EventArgs) Handles Me.Closed
    End
  End Sub

  Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    My.Settings.login_stats = False
    My.Settings.Save()
    MsgBox("取消自动登录成功!")
  End Sub
End Class
